home *** CD-ROM | disk | FTP | other *** search
/ CD School House 9 / CD School House 9.0 - Wayzata Technology (1994).iso / pc / games / mac / __sports__ / sports_trivia__ / football / card_8491.txt < prev    next >
Text File  |  1990-03-18  |  2KB  |  103 lines
  1. -- card: 8491 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 4418
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   put empty into field "number correct"
  9.   put empty into field "number wrong"
  10.   wait 50
  11. end openCard
  12.  
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20.  
  21.  
  22.  
  23.  
  24.  
  25.  
  26.  
  27.  
  28.  
  29.  
  30.  
  31.  
  32.  
  33.  
  34. -- part 12 (button)
  35. -- low flags: 00
  36. -- high flags: 8003
  37. -- rect: left=0 top=282 right=342 bottom=69
  38. -- title width / last selected line: 0
  39. -- icon id / first selected line: 301 / 301
  40. -- text alignment: 1
  41. -- font id: 0
  42. -- text size: 12
  43. -- style flags: 0
  44. -- line height: 16
  45. -- part name: Ask Question
  46. ----- HyperTalk script -----
  47. on mouseUp
  48.   global numberVar3
  49.   global numberVar4
  50.   wait 30
  51.   answer "How many seams are there on a football?" with "16" or "8" or "4"
  52.   if it is "4" then
  53.     add "1" to numberVar3
  54.     put numberVar3 into field "number correct"
  55.     select text of field "number correct"
  56.     doMenu copy text
  57.     go next card
  58.     select text of field "number correct"
  59.     doMenu paste text
  60.     put numberVar4 into field "number wrong"
  61.     exit mouseUp
  62.   else add "1" to numberVar4
  63.   put numberVar4 into field "number wrong"
  64.   select text of field "number wrong"
  65.   doMenu copy text
  66.   doMenu "message"
  67.   beep
  68.   type "4"
  69.   wait 30
  70.   hide message box
  71.   wait 30
  72.   go next card
  73.   select text of field "number wrong"
  74.   doMenu paste text
  75.   put numberVar3 into field "number correct"
  76. end mouseUp
  77.  
  78.  
  79.  
  80.  
  81.  
  82. end mouseUp
  83.  
  84.  
  85. --
  86.  
  87.  
  88. -- part contents for background part 2
  89. ----- text -----
  90. Correct Answers
  91.  
  92. -- part contents for background part 9
  93. ----- text -----
  94. Wrong
  95. Answers
  96.  
  97. -- part contents for background part 3
  98. ----- text -----
  99. 11
  100.  
  101. -- part contents for background part 11
  102. ----- text -----
  103. 8